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jo»»COPYRIGHT 1969i niGITAL rOUIPMLNlT CORP., MAYNARD, "A'^S.ooo 

;THIS SUB-PRnCRAy ASSEMBLED WITH SYSTEM PARAMETER PILE - S.MACtVllI) 

VLIbT 

LIST 
TITLE PTYSRH - HALF nUPLEX PSEUQO TELETYPE SERVICE ROUTINES 
SURTTL n. kilTCRAFT/RAP TS3.19 2" SEP 68 VHf"4 
XP VPTY'R.B^ft 

)PUT Version numpeR in glob listing and loader storage y.tP 



ENTRY PTYSRH 
PTYSRh; 



IQUMMY GLOBAL FOR HALF OUPLtX PTY 



lACCUMULATOR ASSIGNMENTS 



0H?0»2 LIME=TAC1 



?1 
?2 
?3 
?4 
75 
?6 
?7 
?8 
59 

:'l 
."^1 
^2 
■?3 
:"1 
T,b 
:^6 
'7 
^8 
,"19 
t/i 

41 
42 
43 

44 
4 5 
46 
17 
-1 8 
4 9 

•■■■'/! 
■ll 

^2 
S3 
C4 

S5 



1 f () !' k) 
aBfl^Cl 
'I0f^''2 
?! ri /' ^ 3 

?i a i5 a B 4 

fii {? ;' i' 5 
5IKf /I'V 



6l?fi471 
(^ K '^ pi '■' 
00t50''0 

H H !' H ' 3 
0051ii "7 



000010 
000012 
005!013 
000014 
:? 4 

002000 
010000 
040000 



004000 
002^00 
001000 



300000 I 

200000 

010021 

000000 

000033' 

1' 3 

00 00 

000i!00 

00.1000 



CHREC = TEr< 

SCNHAC=12 

PI0S=13 

PDn9=14 

npTB=400 

SP=2000 
T37 = 1000'' 
SYNC=400P0 



(SPECIAL TTY character 
IMODFL 37--FULL CHARACTER SET 
SBREAK CHARACTER SEE^' FROM SCNSER 



!PTY DEVICE '1EPENUENT 10 STATUS BITS (RH DEVIOS) 



IOPTW=4000 

IOPTRE=2000 

MONMnD=1000 



;0UTPUT WAIT (OBJ, JOB HAS DONE INPUT) 
(PTY RESPONSE IS READY 
(PTY IS IN MONITOR MODE 



INTERNAL FTCHECK (FTMONO 
If N rTCHFCK + FTMON'P,< 

EXTERNAL PTYnDn,PTYcSV,PTYSAn,PTYBNDiPTYRMl,PTYDQS,PIOSAV,PDDSAV 
EXTERNAL PTySAV,PTYSA2,PTYRET,PACSAV 
INTFRNAL PTYSA0.PTYRr0, ArSAV0 
> 

IFE FTCHECK+FTMOMPi < 
(PSEUPO CONSOLE DEVICE DATA CLOCK 
(REMAINING PTY DOB'S ARE GENERATED 
(OUT OF LINE AT RJILT TII'E 
INTepn PTYD^B 
7i-. 

/PTY0/ 

'/,10000tSTTYPF*l (PTY0 IS UNIT 1, PTYt IS UNIT 2, ETC. 



PTYOnS! =;IXBIT 
XWO 



EXP 

xt.n 
? 

Xl^D 



PTYDSP 
DVIN*DV0UTi3 



PROG,0 



^7 (^00010 («0?!0P^7 SlBai)?!? 

se ?l0pi|()ll 0ia3H:''0 0i?IPii3!^0 

A0 00(1012 5'0(!0,'0 00i1i?00 

<vl 



xwn nROG.B 

VP BTYCSV,.-Z?t 

7 

yp PTYSiC, ,-E?t 
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62 
S3 
64 
6b 
66 
67 
68 
69 
7ii 



?aPli513 



pi00a3n 



?51b,!0 

i!!000fl0 

30an;'0 



003»;'!0 

00!''0.^0 
0030?0 



"LOCK 

yp 

xp 

PlYSA^: CUT 

PIOSAV: ? 

P0DS4V! 7 
> 



1 i 

PTYB^^D,PTYSA^♦^2' 

PTYRI'l,pTYBNn-l t 

PTYOTS. .-2? ISIEE OF PTY DDB 

RCNHAC.e 
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71 










72 








INTERNAL PTvnSP 


73 








EXTERNAL OUT 


74 


00Kz:u 


263140 


000000 


POPJ PDP 


Ti 


(?0(9032 


263140 


000000 


POPJ PDP 


76 


i?«i(?033 


2&4H(JH 


000037' 


PTYDSPl JRST PTY9EL 


77 


5"H0034 


;^540a0 


000000 


JRST OUT 


78 


!»00ei35 


?54iaji0 


000051' 


JRST PTYOUT 


79 


00C036 


254tif:0 


000161' 


JRST PTYIN 



1 INITILI?ATION 

IPRINT ERROR, STOP JOB 
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•10 

Ml 








«2 


piaca:^? 


135l;"0 


000351 


«3 


P!0C0<10 


4020'S2 


000000 


fl4 


00B041 


2711'0 


000000 


flS 


300042 


336e,»2 


000000 


fl6 


000043 


253140 


000000 


87 


000044 


261140 


000006 


R8 


000046 


5503"i2 


00?'342 


H9 


000046 


260140 


000000 


t)n 


000047 


262140 


000005 


^1 


000050 


263140 


000000 



EXTERNAL PTYTAB.TCONLN.TTYTAn,TTYt<lL 

PTYKEL: LDR LIME.CPOINT 6 , OEVCHR ( DDB ) , 23 3 
SETi^i PTYTAB(LINE) 
ADOl LINE.TCONLN 
SKTPM TTYTAB(LINE) 
PQPJ pnp, 
PUSH p'op.cnB 

HRR£ DnB,TTYTA3(LINE) 
PUSr4J PDP.TTYKIL 
POP PDP<DDB 
POPJ PDP, 
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92 

93 
94 
95 
95 

98 
99 
100 
l?ll 
1(12 
103 
lf)4 
1H5 
136 
lf17 
108 
109 
110 
111 
112 
113 
114 
115 
116 
117 
118 
119 
120 
1?1 
122 
1?3 
124 
125 
126 
127 
128 
129 
1:^0 
131 
132 
133 
134 
135 
136 
137 
138 
139 
140 
141 
142 
143 
144 



800051 
000052 
000053 
000054 
000055 
000056 
000057 
000060 
000061 
000062 
000063 
000064 
000065 
000066 
000067 



000071 

000072 

000073 
000074 
000075 
000076 



135100 
264000 
3360''i2 
5523'^2 
332002 
2540C10 
2711^:10 
201480 
260140 
302400 
2540^10 
26401*10 
6600ifl0 
202006 
263140 



000070 6610«10 



202006 
264000 

60Z0P0 
263140 
623000 
661000 



iPTY OUTPUT 

;IF NO TTYTaT entry EXISTS F'^R THIR PTY, 

;SENT TO SCS'-EP (TCQmM) CAUSINT, AN ENTRY 

;A TTY DATA RLOCK IS AWAILA3IE, IF NOME 

iAN "X" IS RETUR'-'En IN WHICH CASE I01ERR IS SET IN PTY STATUS 

SANn Ol.tTPUT IS TfRMifJATEO. 



A SBATE IS 
TO "I MADE IE 
IS AVAILARLE, 



lIF A TTY DEVICE DATA BLOCK IS AVAILABLE, CHARACTERS ARE 
TRANSMITTED TO TCOmm. IF A RESPONSE IS RECEIVED AS INDICATED 
iBY THE SP BIT in TTY STATUS, THE PTY OUTPUT BUFFER IS 
lADVANCED, lOPTRE IS SET IN oTY STATUS, AND CONTROL RETURNS 
)T0 THE OUTPUT UUO AND THENCE TO THE USER, 
;1F NO RESPONSE IN ENCOUNTERFD, OUTPUT PROCEEDS IN THE 
INORMAL FASHION ADVANCING THF PTY OUTPUT BUFFERS 
JUNTIL THEY ARE EMPTY. 

JIOPTHE IS SET EVERY TIME THE JOP RUNNING ON THE PTY (OBJECT JOB) 
(ODES AN "OUTPUT" UUO, lOPTW IS SFT WHENEVER THE OBJECT JOB DOES 
IAN INPUT, THE ORJECT JOB THEN GOES INTO I/O WAIT UNTIL THE JOB WITH 
(THE PTY ASSIGNED (CONTROL JfB) HAS COMPLETED ITS OUTPUT UUO. 
IMONMOD INOICATES PTY IS IN MONITOR MODE (ITS LINKED TTYOO? HAS TPMON 
JSET IN UH OF lOS) 



EXTERNAL TCONLN.TTYTAB, TCOMM, TPYTaB.PTYTAB.ITMCNT, SET lOD 
EXTERNAL ADVPFE.PUNIT 



000000 PTYOUTi LDB LINE,PUNIT 

000247' JSR PTYSAV 

000040' SKIPV PTYTAB(LINE) 

000053' HRRiM DDB,PTYTAB(LINE) 

000000 SKIPF TPYTAB(LINE) 

000072' JRST PTYOU0-1 

000041' AODI LINE.TCONLN 

000240 MOVEI CHREC,240 

000000 PUSHJ POo.TCOMm 

000130 CAIE CHREC,"X" 

000070' JRST PTY0U6 

000260' jSR PTYRrT 

200000 TRO !0S,I00ERR 

000002 MOVE'" I0S,DEVI0S(0DB1 

000000 POPJ PDP, 



IHAS 
lYES 



INO 



A TTY DDB BEEN ASSIGNED? 



lANY AVAILABLE? 
lYES 

INO 



010004 PTYOUol TLO 
) 



I0S,T37*I0FST iFORCE BUFFER RESET 

IT37 SO TABS, ETC NOT TRNSLATED (TIMING FRRQR OTHERWI 



000002 
000260' 



MOVEM IOS,DEVIOS(DDB) 
JSR PTYReT 



002000 PTYOU0! TRNE lOS.IOPTRE 
000000 PQPJ PDP, 

000002 TL2E lOS.IOBEG 

000004 TLO IOS,IOFST 



IRESTORE ACS 



(FIRST 10 
(YES 
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115 


ra0f2!77 


627^'--e 


^B^k^'M 


146 


C0ri["b" 


?54iJ/e) 


f0i>112 


147 


?00iri 


661!" i) 


f^0a0?i) 


148 


f"0ClC2 


55Pi'46 


^id7.<i\f. 


149 


r00if3 


27,l;'40 


V'fi-7,m2 


150 


?!()? 1?!4 


?71>>47 


?0?!('.70 


151 


PiB^l.^S 


?0?,r;46 


?0?^i»lB 


1-^2 


?0^1C6 


55P)??0 


00?I0B1 


153 


?'0f^l!'7 


3222,-0 


i^0?H42 



TL?\ Ii^SiIOFST 
JRS'' PTVUl 

Tin I OR. 10 

JRR? TACOEVi^A" (TDB) 
ADD TACCXWn 7ai;,i: 
ADDI TAC,(PRnG) 
^OVE'^ TAC.OEVOaD(DIB) 
HRRii ITEMiUTAC 
JUMPE ITFM.PTY0U8 



IFIRST ITEM IN BUFFER? 

IMO 

)VFS. INITIALI2E POIMTER S COUNT 



IBUFFER EMPTY? 
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154 00?11l) J50140 000000 

155 pi0flll ?0?2a6 «00011 
156 



PUShJ PDP.ITMCNT 
MOVE" ITEMiOFVCTRtTDR) 
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157 
1=58 
159 
lfi0 
161 
162 
163 
164 
165 
166 
167 
16B 
169 
170 
171 
172 
173 
174 
175 



000113 
("00114 
000115 
000116 
000117 

0i30i?e 

01301?1 
000122 
000123 
000124 
000125 
000126 
000127 

000131 



6600:"0 010000 PTYOUl! TRO lOS.IOACT 



620000 
2640/-0 
l35li'0 
271100 

2500;'0 

375014 
254i?'^0 
134414 
260140 
603000 
2540;<0 
6030^0 
2540/0 
6030''0 
2541)^0 



002000 

000247' 

000051' 

000057' 

000013 

000011 

000140' 

000010 

000061' 

000004 

000140' 

002000 

000133' 

040000 

000140' 



?00132 2540?0 000120 



TR2 lOS.IOPTRE 
JSR PTYSAV 
LOB ilNE.PUMlT 
AOni LINE.TCONLM 
FXCH lOS.PIOS 

PTY0U2! SOSGF r)EVCTR(PDDR) 

JRST PTY0U3 

ILDB CHRFC.DEVnAD(PDnB) 
PTYOI)7i PUSHJ PDP.TCOMM 

TLNE lOS.IOFST 

JRST PTYnU3 

TLME lOS.SP 

JRST PTY0U4 

TINE IOS.SYnC 

JRST PTY0I13 

JRST PTYnU2 



ISAVE ACS 



(BUFFER EMPTY? 

lYES 

INO 

ISEND NEXT CHARACTER 



ISPECIAL CHARACTER ECHO? 

lYES, SEE IF CONTROL CHAR ECHO 

INO, BREAK CHARACTER SEEM tF OBJ, 

)YES, BUFFER NOT MOVED INTO OBJECT 

IJOB TTY INPUT BUFFER 

(NO 



JOB ShaPPED OUT? 



176 
177 
178 
179 
l'i0 
IPl 
182 
183 
134 
1R5 
186 
1R7 
188 
1S9 
190 
191 
192 
193 
194 
195 
196 
197 
198 



000133 
000134 
000135 
000136 
00137 

000140 
000141 
000142 
000143 
000144 
000145 
000146 
000147 
000150 
000151 
000152 
000153 
000154 
000155 
000156 
0001'^7 
000160 



3024P«0 
2540-'0 
202414 
2020'-;6 
660540 

264000 
2500-?0 
6230r^0 
260140 
505040 
544046 
540060 
2020'16 
260140 
254000 
606540 
254e,:0 
6600. "0 
6200:'0 
6610;'0 
2 2 '■ 6 
263140 



000136 

000123' 

000012 

0000!^2 

002000 

000260 ' 
000013 

000001 
000000 

000007 
000006 
000001 

000010 

000000 

000155' 

002000 

000073 ' 

002000 

014000 

000004 

000002 

000000 



PTY0U4! 



PTY0U3: 
PTY0U8! 



CAIE CHREC."'" 

JRST PTY0U7 

MOVEf CHRECPTycSVIPDQP) lYES, FLUSH OUTPUT 

MOVE" IOS,DEVIOS(ODB) ISAVE TTY STATE 

TRO dI0S,I0PTRE ILET USER KNOW 



jSR PTYRET 
FXCH . IDS.PIOS 
TL2E lOS.lOW 
PUSHJ PDP.SETIOD 
HRL I TACPROG 
HLR TAC,nEV9UF(DnB) 
HRR TAC.SiTAC 
MQVEM TAC,DEVOAD(OnB) 
PUSHJ POP.ADVBFE 
JRST PTYnUS 
TRNN PICS. IQPTRE 
JRST PTYtiU0 
TRO lOS.IOPTRE 
PTY0U5t TR2 !0S, I0ACT*10PTW 
TLO TOS.IDFST 
MOVEM lOS.nEVIDS(DDB) 
POPJ POP, 



[RESTORE ACS 



ISTART PTY JOB 



OUTPUT BUFFER 
IS EMPTY. 



lADVANCE PTY 

(NEXT BUFFER 

IRESPONSE? 

INO 

(YES. SET RESPONSE FLAG AND 

ICONSIDER OUTPUT COMPLETED 



RETURN TO USfR 
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199 
I'M. 
2.U 
2"2 
2-'3 
2?n 
2--15 
235 
2C7 
2('fl 
Z?? 
21B 
211 
212 
213 
214 
215 
216 
217 
21B 
219 
2?f! 
2?i 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
23 4 
235 
236 
23 7 
238 
239 
240 

241 
242 



7!0?1A1 
(»0Plfi2 
?0(?lfr3 
!'flfllft4 
(»l15"lf.& 

pieil»167 
00P1170 
(^0PI171 
P'0PI172 
PI00173 

(100174 
B0PI176 
00f 17A 
("0PI177 
000201) 
000201 
000202 

0002:'3 
000204 
0002''5 
000206 
000207 
000210 

000211 
000212 
000213 
000214 
000215 
000216 
000217 
000220 
000221 
000222 
000223 
000274 
000225 



135l'?B 
271ir0 
5506"2 
32*600 
660000 
254000 

261140 
6610C0 
630000 
205040 
502046 

660000 
200554 
607540 
254000 
402070 
?504;'6 
3224^0 

607540 
?54 0-.'0 
200240 
260140 
2540O0 
254000 

322200 
250540 
250600 
262140 
261140 
261140 
260140 
262140 
262140 
250540 
250600 
261140 
254000 



EXTERNAL Tro"LN,TTYTAB,SET!o-',ST004T.AnveFF,STnsaD,ADREHR 

0003'-l' pTYIn: LDP LIME, [POINT 6 , nE"CHH ( DOB ) , 23 ] 

000116' AOni LlNFiTCONUN 

000045' HRP^ PnDo,TTYT4R(LINF ) ;TTY DOS ADDRESS 

000167' jUMpv POnB.PTYIM (HAS TTY DOR BEEN LOST? 

"00000 TRO lOS.IOlMPM lYES, THAT'S AIL, 

000245' JRST PTYIN8 

000002 PTYIM! PUSH pnP, LINE 

000004 TLO !OS,IOFST 

000353' TO? lOS.CXWD In.IOPTBE: 

440707 "OVSI TAC, 440703*PROG 

1300010 WLL'^ TAC.nEVPTRfODB ) 



010000 

000002 
002020 
000241 ' 
00001 3 
000012 
000212' 

032020 
000230' 
000010 
000000 

000000 

000233' 



000 



PTY IN41 



TRC lOS.IOACT 

^ovE Pios,nEviPS(pnD«) 

TL^'N PIQS, lO + SP 

JKST PTY I 10 

SET2M CHOEC 

FXCH CHRFCPTYCSVCOD" ) 

.lUMPF CHREC,PTYI''i5tl 

TLMN PIOSi lO+SP 
JRST PTYI3B 
"OVE DAT,CHRFC 
PUSHJ PQc.STODAT 
JRST AORERR 
JRST PTYIN6 



26' PTY1N5I JUMPE ITEM,PTY|3A 

00 FXCH P lOS, lOS 

06 FXCH PnDR.nOR 
02 POP POP. LINE 
J4 PUSH POP, ITEM 

07 PUSH POP, PROG 
23' puShj POPiTcOMM 
'A'l °0P noP.PROG 

4 OOP POP. ITEM 

00 FXCH PIOS. lOS 

6 FXCH pnoB,noB 

12 push PnP,LlNF 

03' JRST PTYIN4 



IHAS FIRST CHAP BEEN REC7 

; NO 

lYESiSAVE LIME NO, 

I IS TTY noNE? 

;YES, ThATS ALL 

ISTORE CHARACTER 

IBUFFER FULL 

I IF COUNT RUMS OUT 
INO. GET NEXT CHAR, 
(SET IDS AND DBS FOR TTY 
JRFSTORE LINE NO, 
ISAVE ITEM COUNT 



(RESTORE ITEM COUNT 



PTVS^H 



243 
2^4 
?45 
?'15 
?47 
248 

■?':■./: 

?'52 
2';3 
?'S4 
?5S 
2'=;6 

2'59 
?(-? 
2'.1 

262 

2ft3 
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5<0!'2?6 
!'vl(1?.?7 
(»0p:230 

?0M2,13 
001^234 
P00235 
P00235 
!»0P237 
000240 
000241 
000242 
000243 
000244 
?00245 
000246 



6200:'0 
660K-.-0 
260140 
254 H' 
6650-0 

6 6 00.10 
260140 
254070 
6610;"0 
622000 
254000 
6230!'0 
260140 
620000 
262140 
2020^6 
263140 



4/10T0 

ei)20.<B 

?i!0<'."0 
00'''2?7 ' 

7 J ;■ 4 
0024;.'0 

000J00 

003241 I 

,T «) 4 

000400 

000212' 

000001 

000143 ' 

010400 

000002 

00:"002 

00<"000 



PTVI3A! TR? lOS.IO^'KTL 
TR'i lOS , lOPTRE 

PTyi3d! puShj PCP.ST.-^STn 
JRRT AORlRR 
TL^A inS.IOFST 



I\'PUT RFaDy 



PTylN6 1 TRD 



lOS, lOPTRE+RPTR 



PUSHJ, PDP,AOVBFr 

JRRT PTYI10 

TLO lOS.lOFST 

TR2E lOS.RPTB 

JRST PTYI.M54.1 
PTYI10! TLEE IDS, low 

puShJ POP, SFTlon 

TR? IDS, I0ACT*RPTB 

PQP POP, LINE 
ptYI*JB: »'CVE-m !0S. OFViaStno:') 

POPj POP, 



lAOVANCE PTY BUFFER 
IMFXT PUFFER IS FULL. 
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264 
265 
?^6 
267 
268 
2('-9 
27f) 
271 
272 
273 
274 
275 
276 
277 
278 
279 

2aPi 

2 = 1 
2r-2 
2H3 

2^5 
2Rfi 
2''7 
2^8 
paq 

292 
291 
292 
293 
294 
295 
295 
297 
298 
299 
3;"ii 

Z:n 
3.-2 

3 ■,'3 
3"4 
3 :■ 5 
3 -'6 
3^7 

3;- a 



?I0(^25(" 
?002?1 
?Bf^252 
7ef 253 
;:«0C254 
510?1255 
C0C255 
f0?2'?7 



?0!)261 

170^262 
P!07'263 
!»00264 
r"0!"265 



iSiVE ACCUMULATORS 

JCALL ^OVEI DOtJ.ADnRESS OF PTy^B 

) JSR "TYSAV 



IFE F1CHFCK*FTW0MP.< 



s?00247 fi00i)>'0 eidC'APie 



P01'267 
''0f 27^ 
f?C271 

''0?272 
!'0C273 
000274 



2025:^6 
5505"0 
271570 
5425^0 
?755'0 
?560'10 
2006;^0 
254070 



000025 

000006 

000024 

000026' 

000011 

000026' 

000006 

005)247 < 



PTYS4V: 
> 

PTYSA0! 



"OVE" SCMHACPTYPNDCnOR) 
MRP? SCNlHACDD? 
4001 SCNiHACPTYBMI 
MftRM Sn\HAC,PTYS42 
SUBI SCNHAC,SCmhAC-1 
XCT PTYSA2 
MOVE PDDB,noE! 
JRST SPTYS4V 



(SAVE HIGH AC 



)D0 BLT <;cnhac, , 



RESTORE ACCUMULATORS 

CALL MOVEI PDOB.PTY DATA PLOCK ADDRESS 
JSR PTYRfT 



IFF FTCHECK+rTMOMP,< 



?0?26,; 0000:»0 000000 PTYRFT: 



550570 
?715C"0 
5170-^0 
2515.-^0 
254020 



000014 
000013 
000012 
000012 
000263' 



PTYHEKI 



000266 30005^0 000000 



202540 000027' 
2026C0 000030' 
254020 000266' 



hRRZ SCNHAC.pDDB 
ADOI SCNHAC.PTySAC 
HRLiS SCNHAC 
?LT SCNHAC, SCNHAC 
JRST PPTYRET 



ISaVE ONLY PIGS AND PDD8 



IFE rTCHECK + FTMO'vjP,< 

PACSAV! 51 

> 

ACSAV0! 



MOVE" 
mQVFm 
JRST 



200540 000027' ACRET: MOVE 
2006'/0 000030' MOVE 

263140 000000 POPJ 



PIOS.PlOSAV 
PDOg.PDOSAV 
i?PACSAV 

PIOS.PlOSAV 

POOB.PnoSAV 

POP, 



PTVSRH 
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3[')9 
310 
311 
312 
313 
3 3 4 
315 
316 
317 
318 
319 
320 
i?l 

y?2 

3?3 
3?4 
3?5 
3?6 
3P7 



J100275 
P'0C)276 
000277 
f!003Pi0 
0003(»1 
P003('2 
!^0C<3«"3 
0003^4 

0003?^5 
("003K6 
!^003P7 



2006?0 
2755^^0 
550614 
A600B0 
2023?6 
201f"l0 
437054 
202414 

261140 
261140 
135040 



! INTERCEPT TTY OUTPUT AT UUO LEVEL AMD SYIvCHRONI?E 
;TTY OUTPUT WITH PTY INPUT 



INTERNAL PTYPE 

EXTERNAL TCO^LM.PTYTAB, CLOCK, CIPWTMl.iJAKE 



000002 

000162' 

000054' 

010000 

000002 

002000 

000002 

000012 

000010 
000002 
000354- 



PTYPE ! 



PTWAKE ! 



MOVE PDDR.LIME 
■SUBI PDDP.TCONLN 
HRRB pnDn,PTYTAB(PDOP) 
TRC lOS.IOACT 
MOVE^ 10S.0EV!0S(D0B) 
MOVEI TAC.IOPTRE 
lORB TACOEVIOStPOnB) 
HOVEM nHREC,PTYCSV(PODB) 



IFORCE RESCHED TO CONTROL JOB 



JS4VE CHARACTER 



PUSH PDP.TEM 

PUSn PDP.TACl 

LDR TAC, [POINT 6 . DEVCHR ( PDOB ) . 5] 



;PTY JOB NR 



328 
329 
33 
331 
332 
33 3 
33 4 
335 
336 
337 
338 
339 
340 
341 
342 
343 



000310 
000311 
000312 
000313 
000314 
000315 
000316 
000317 
000320 
000321 
000322 
000323 
000324 
000325 
000326 
000327 



550100 
306l''0 
2540('0 
554 4 02 
302410 
364110 
1354?0 
3124'>0 
364li-0 
2004''2 
6 20 4 00 
3500f0 
2024f'2 
262140 
262140 
263140 



000000 

000000 

000325' 

000000 

000000 

000311' 

000355' 

000001 

000311' 

000000 

007777 

000010 

000000 

000002 

000010 

000000 



PTWAK21 



PTWAKl I 



MRRE TACl, CLOCK 

CAIN TACl.ClPWTMl 

JRST PTWAKl 

HLR2 TEM.(TACl) 

CAIE TEM.WAKE 

SOJA TAC1,PTWAK2 

LDB TEM.CPQINT 6, (TACl). 23: 

CAME TEM.TAC 

S0J4 TAC1,PTWAK2 

MOVE TEH.(TaCI) 

TR? TEM.7777 

ADS TEM 

•^OVEM TEM,(TaC1) 

POP PQP.TACl 

POP PDP.TEM 

PQPJ POP. 



(LAST JOB IN CLOCK QUEUE 
ILOOKED AT ALL JOBS 
lYES. WAS NOT SLEEPINC 
ISLEEPING J097 

INO, IN QUEUE FOR SOME OTHERlREASON 

IJ08 NP IN QUEUE 

IIS IT THIS ONE? 

INO, LOOP TILL DONE 

lYES, 2ER0 TIME LEFT TO SLEEP 

lAOD ONE SO NEXT TICK WILL MAKE 7, 



PT vSHH 
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344 
i4b 
.^4 6 
747 
(48 
349 

.i'52 

354 
355 
3S6 

356 
359 
36e 
361 
362 
363 
564 
365 
366 
36 7 
368 
369 



jRnuTIVif; Tc SET vSRIOiJS ■^IT': 

;C4LLi'.T fK->^ Sr\sr3 .. I t j TTY L I 'n.E NUMBER IN LIME 



INTE=;'V4L FTYDn,rTM\«~,^T"MM2 
70?3''^ ?64^-.2 0^72661 PT^iN-Ul j£B Fa:S4V 

pae33i 2B;i54i/ ^bi,i;'^ ^'Cvei °ins,Mr\"QQ 

'0(^332 ?54f;,-i" !"a?34^i jR^t pTYS^T 



(»0I'333 
70P334 
(»0!'335 

r0?336 
?'0a337 

510(»34i3 
f0?!341 
'/ ? 3 4 2 
("^("343 
^00344 
ri0!'345 
^07346 
?et"347 
f0C35a 



?640'/e 

561541J 
254?-0 

-64e"0 
221540 

?0C6.'0 
2756-1? 
550614 
623542 
413554 
437554 
602540 
260140 
2540:.' li 



0051266' PT'^.MMifi jSR 
0013f0 MRfoi 

007340' jRST 



PaCSaV 

°irS,M?NMOD 

oTYSrT 

DACSAV 

piosi npT^ 



003266' PTYOw: JSP 

3040.?0 MOVE I 

0000;"2 PTYSn : '^DVE 

30''276' ?L''I 

007277' ijRb; 

777777 TL?E 

f:00a?2 ^f.ncAB 

7J00"2 I0R3 

0e40i»0 TRKir 

f0?3;"5' ='USm.i pdc.pt-.ak'e 

?'03272' jkST ACRfT 



jSAVE 2 AC'S 

IPTY INTI ^flviTOR mOGE 



SSAVE AC'S 

IPTY OUT OF wONITOR •^OOE 



IPTY IN OUTPUT WAIT 



°CDb',LI\T 

fDHR.Trj'xV JFINO 

POOBi PTYTAR ( Bonb) 

PI3S,-1 IBIT TO PE SET OR 

flOS.DFVIOS(PDDa) JZEROEP 

pps,OFvios(PL)ndi 

t'ns.IiPT^ :iS LIMKEO TTY JOB IN 

lYES, "JAKE UP CONTROL 



PTY That tty is li'^keo to 

ZEEROEn 



IMPUT 
JQP 



WAIT? 



DTVSOH 



HALF nuPLEX PSEUDO TELETYPE SEKVITE H"UTI\E= 
^. iJI TCRAFT/;(AP TS;i,19 ^4 StP 68 VZ'^H 



^■A"R'\VJ6 19:1:' 



'l-J|irj-69 PAGE 25 



37? 










371 


f0f"351 


14!i6''6 


aD7. 


'■1 


372 


('e7i^2 


?0H7^e 


H^7l 


■■■i 


373 


Pai'3'^3 


"Kl'^t'?!?! 


CB?, 


.^i 


374 


" !" 3 T 1 


35061 4 


ff;r; 


n 


375 


?H!'3'5!; 


14-"6-2 


?//!?. 


-a 



MO ERRORS DETECTED 
oRnSHA^" nRFAK IS eC0o56 



PTYS«H 
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iC^ET 


5>00272 




AUV^ff 


«)0(?15i3 


EXT 


CIPWTM 


TtOOZM' 


FXT 


HOP 


5l0f1K'5 




DEVCTft 


fef-^iM 


INT 


nEv^^D 


0Klfil210 


INT 


n v u T 


(^B^J"! 


INT 


10 


5)0 0i!?0 


INT 


lOBKTL 


f"10w?0 


INT 


10 1 MPM 


4000/;e 


INT 


TOS 


5i0?K-,;0 


INT 


ITKCM 


W0011.0' 


EXT 


OUT 


?000,S4 ' 


FXT 


PDOSAV 


^0ae,70' 




PI0S4V 


■;i0p:0?7' 




PTfN"? 


!!'003^3' 


INT 


PTWAKE 


^00305 ' 




PTYCSV 


!?00012 


I, NT 


PTYJSP 


■^nee-zz' 


INT 


PTY MB 


000230 ' 




P T Y 1 M 4 


i" 2 ■' 3 ' 




PTYI'iS 


000245' 




PTYnil2 


00012B' 




OTYOi.'S 


7)00155' 




PTY0I18 


5100142 ' 




PTYPr 


?i00275' 


INT 


PTYRFT 


000?ft0 ' 




PTYSAC 


^00013 


INT 


PTYSPH 


0000?!0 ' 


INT 


RPT3 


0B0400 




SP 


a020:)0 




STTYSP 


000020 


INT 


TAC 


^000?il 


INT 


TCONLN 


^00341' 


EXT 


TTYKIL 


a0ae46 ' 


EXT 


WAKE 


!100314' 


FXT 



4CSAV0 


00712^7 




AUVBFF 


00^234" 


EXT 


CLOCK 


["0031 ' 


FXT 


ntVBUF 


0000C6 


INT 


TEVOAT 


000006 


INT 


"EVPTR 


5!0n0i0 


INT 


FTCHEC 


000000 


INT 


I04CT 


i?.i?i000 


INT 


lOOERR 


200000 


INT 


lOPTRE 


ia20!»0 




lOW 


000001 


INT 


LI'^'E 


0000^2 




PACS4V 


000266' 




POP 


0000''3 


INT 


PROG 


000007 


INT 


PTWAKl 


000325' 




PTYBMl 


000024 


INT 


PTYnOB 


0000(1,0 1 


INT 


PTYI10 


000241 ' 




PTYI-v; 


000161' 




PTYIN5 


0002)1" 




PTYQiie 


000073' 




cTYoi)3 


000140' 




PTY0U6 


:"00070 1 




PTYOUT 


?i00051i 




PTYRr0 


000261' 




PTYS40 


000250" 




PTYSAV 


000247' 




PTYT4B 


000342' 


FXT 


SCNHAC 


000012 




STOOAT 


000206' 


FXT 


?iYNC 


040000 




TACl 


000002 


INT 


TEM 


000010 


INT 


TTYT4B 


000163" 


FXT 


?i 


000000' 





ADPEPR 


000231 


FXT 


CHREC 


00001f 




OAT 


K00005 


.NT 


OEVCHR 


H000;!11 


I NT 


OEVIOS 


000002 


INT 


OV IN 


000002 


TNT 


FTiHONP 


f00000 


TNT 


lOBEG 


000002 


TNT 


lOFST 


000004 


INT 


lOPT'-J 


H04000 




ITEM 


000004 


INT 


'lONMOD 


001000 




PDOB 


000014 




PIOS 


000013 




ptmnmo 


000330' 


INT 


PTWAK2 


000311' 




PTYBNO 


000025 


INT 


PTYDDS 


000026 


INT 


PTYI3A 


000226' 




PTYINl 


000167' 




PTYI-vie 


000233' 




PTYOUl 


000112' 




PTYQU4 


000133' 




PTY0U7 


000123' 




PTYOW 


000336' 


INT 


PTYREL 


000037' 




PTYSA2 


000026' 




PTYSET 


000340" 




PUNIT 


000115' 


FXT 


SETIOD 


000242' 


FXT 


sTosno 


000230' 


FXT 


T37 


010000 




TCOMM 


000217 ' 


FXT 


TPYTAB 


?00055' 


rXT 


VPTYSR 


000004 


INT 



A 


6# 


6 




















ACl 


5# 


6 




















AC? 


6# 


6 




















AC3 


btt 






















ACRET 


3^6tl 


3A8 




















ACSAV0 


3C2# 






















ADRERR 


199 


226 


247 


















ADVBFE 


117 


190 




















AOVBFF 


199 


2-^1 




















AEFE^R 


6« 


6 




















AL 


6# 


6 




















ASSCN 


6# 


6 




















ASSP^G 


bit 


6 




















8 


6« 


6 




















qUEPMT 


6# 


6 




















RUFW=!D 


5# 


6 




















CHPE'" 


2Z# 


1?6 


128 


156 


176 


178 


218 


219 


220 


224 


323 


r IPWTM 


314 


329 




















CL^S 


6# 


5 




















CLOCK 


314 


328 




















CL5IK' 


6# 


6 




















CLf^OIIT 


6# 


6 




















CMWB 


6# 


6 




















CORCVT 


6# 


6 




















n 


bit 


6 




















DAT 


bit 


6 


224 


















nci. 


bit 


6 




















ncLl 


btl 


5 




















OCLO 


bit 


6 




















DCLR 


b» 


6 




















noB 


18i» 


S2 


87 


88 


90 


12 2 


132 


138 


148 


151 


155 




197 


2^1 


212 


219 


231 


23 9 


2(i0 


272 


273 


278 


320 


ODI 


hn 


6 




















ODO 


5# 


6 




















nE*; 


ill 


6 




















nEVA"R 


btl 


6 




















nEVBi'F 


b# 


6 


187 


















nEvcHR 


bit 


6 


82 


201 


327 














HEVCTR 


btt 


5 


155 


164 
















nEvoftT 


bU 


6 


18 


















OEVEXT 


bU 


6 




















OEVFIL 


6« 


6 




















DEVI AD 


6# 


6 




















HEvms 


6# 


6 


132 


138 


179 


197 


215 


260 


320 


322 


364 


nEVLOG 


bit 


6 




















DEVMOD 


bit 


6 




















nEVN»M 


6# 


6 




















OEVOAD 


6* 


6 


148 


151 


166 


189 












REVPPtg 


6# 


6 




















DEVPTR 


6# 


6 


212 


















nEVSER 


5# 


6 




















OGF 


bit 


5 




















DHNG 


btt 


6 





















179 



187 



189 



365 



n I " 


6« 


t 


"i- I 


bH 


6 


TLK 


6« 


6 


PMT 


6» 


6 


■) \ » e: 5 R 


6« 


6 


rov 


6« 


6 


^R 


6« 


6 


"RL 


alt 


6 


nR^■ 


6« 


6 


nsf R 


bit 


6 


1S1 


btl 


5 


nSKRLo 


en 


6 


nso 


6# 


6 


nViVAL 


6# 


6 


nvro" 


6# 


6 


nvniR 


6# 


6 


nvoio 1 


btt 


6 


nvni<; 


6tt 


6 


nvnsK 


b» 


6 


nvnT4 


btt 


6 


^VIN 


6« 


6 


nvLNr, 


6« 


6 


nVLPT 


btt 


6 


nvi-Tft 


bit 


6 


nvouT 


bit 


b 


r)VPTP 


6# 


6 


PVPTC 


6# 


6 


nVTTV 


fi« 


6 


FNTRH 


6# 


6 


FB^ERR 


6# 


6 


FNFFRR 


6# 


6 


THnSFG 


6* 


6 


FTJRFl. 


btt 




FTATTi 


bit 




FTCHFC 


bit 


3 7 


FTFX4M 


btt 




FTFINI 


btt 




FTGETT 


btt 




FTHALT 


b» 




FTKCT 


bit 




FTMO\P 


btt 


:':7 


FTPRV 


btt 




FTO410 


btt 




FTRCWK 


btt 




FTREiS 


btt 




FTSLEE 


btt 




FTTALK 


b» 




FTTIME 


bit 




FTTR4C 


btt 




FTTRPS 


bit 




FTTTYS 


btl 




WSAM5K 


bit 


6 


HSAPIS 


btt 


6 



5 3 



53 



3B 



4J 



269 



269 



287 



237 



299 



299 



MSASIZ 


oH 


6 


























HU»'GCT 


b» 


6 


























MU';nsT 

I 


b* 
btl 


6 
6 


























IB 


6* 


6 


























IBLiF-^ 


6« 


6 


























ICLOSB 


6# 


6 


























IL" 


6# 




























ILUERR 


6# 


6 


























INRF^ 


btt 


6 


























INITR 


6« 


6 


























INP8 


bit 


6 


























10 


btt 


6 


147 


21ki 


216 


272 


















lOACT 


btt 


6 


157 


19'3 


214 


258 


319 
















lOBEG 


btt 


6 


143 
























lORKTL 


bit 


6 


244 
























lOROT 


btt 


6 


























IOCON: 


btt 


6 


























lODENO 


6* 


6 


























lOOERR 


btt 


6 


131 
























lODTER 


bit 


6 


























lOENn 


b* 


6 


























lOFST 


bit 


5 


135 


144 


145 


168 


156 


2?9 


248 


253 










lOIMPM 


btt 


6 


2;i5 
























lOMRCK 


6« 


6 


























lOPAO 


btt 


6 


























lOPTRE 


33« 


141 


158 


18(5 


192 


104 


210 


245 


250 


321 










lOPTK' 


.■^?« 


195 


358 


366 






















IDS 


6# 


6 


131 


132 


135 


138 


141 


143 


144 


145 


147 


157 


158 


162 




lf.8 


170 


172 


179 


113 


184 


114 


195 


196 


197 


2C5 


2519 


210 


214 




230 


238 


244 


245 


248 


250 


Z'^i 


254 


256 


258 


2b7, 


319 


320 




lOTEvO 


6# 


6 


























lOIISF 


btt 


6 


























lOW 


btt 


6 


1?4 


256 






















lOWC 


bit 


6 


























IPPERR 


bit 


6 


























ITEM 


btt 


6 


152 


153 


155 


229 


233 


237 














ITMCN'T 


116 


150 


























JACCT 


6# 


6 


























JBFATR 


btt 


6 


























JBFCTR 


btt 


6 


























JBFPTfl 


btt 


6 


























JBUF 


bit 


6 


























JD4T 


btt 


6 


























JERR 


btt 


6 


























JLOG 


bit 


6 


























JN4 


btt 


6 


























jRn 


bit 


6 


























JWPOS 


bit 


6 


























JWSI? 


bit 


6 


























JXPN 


bit 


6 


























LINE 


19it 


82 


S3 


S4 


3 5 


88 


119 


121 


122 


123 


125 


160 


161 


2b)1 




2t"2 


21^3 


2»8 


232 


240 


259 


316 


360 















UISTqiM 

LOnKfi 

^^ERDLE: 

MONMOO 

MECERfi 

\iLEE''R 

NSnERR 

MSFERR 

NSLIF 

MSRRIT 

MSUP 

NX" 

OBUFR 

nCLOSB 

PUT 

nUTBFB 

nUTPR 

P4CS4V 

pone 
ponsAV 

POP 



PIOS 

PI0S4V 
POV 
PROG 
PRTEPH 

PTMNMD 

PTt,AKl 
PTWAKZ 
PTWAKE 
P T Y H K' 1 
P T Y H M D 
P T Y C S V 
P T Y n n B 

PTYnns 

PTYDSP 
P T Y 1 1 
P T Y I 3 A 
P r Y I ,^ B 
PTYIM 
P T Y I M 1 
P T Y I M 4 
P T Y I NJ 5 
P f Y I k' 6 
P T Y I N B 
PTYOU0 
PTYnm 

PTYnuz 



6 

6# 

6# 

6« 

5« 
bit 
bit 
bit 
bit 
bit 
6» 
bit 
bit 
li 
bit 
bit 
300# 
7i* 
317 
69# 
6# 
185 
2^7 

?2# 
358 
«8# 
6# 
bit 
btt 
347 
347 
33U 
3?9# 
3?iJ« 
65# 
64* 
60# 
47 
66« 
52 
2]7 
S?9 
2?3 
7? 
274 
2?2# 
220 
227 
2!'6 
124 
146 
164# 



6 
6 
3Ma 
6 
6 
6 
6 
6 
6 
6 

6 
5 
7 7 
6 
t 

3C4 

164 

318 

3C3 
6 

190 

259 

162 

363 

3?^2 

6 

6 

349# 

353# 

341# 

333 

36 7 

65 

f-A 

6e 

49# 

65 

72 
252 
244# 
246* 
2!'1# 
2^8* 
241 
229« 
25t!« 
26H# 
141# 
157# 
175 



354 



349 
166 
322 
327 
74 
198 
261 
180 
364 
306 

56 



336 

274 

65 

178 



76# 
256# 



:55 



193 



35J 
170 
323 

7S 

2(18 
3PI8 
Ifli 
36b 



57 



357 

213 
327 

96 
225 
325 
192 
366 



150 



2?i4 
360 

87 
232 
326 
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